Google
 
Trailing-Edge - PDP-10 Archives - 6.1_emacs_manuals_1er - emacs/mazlib.:ej
There are no other files named mazlib.:ej in the archive.
PW
[0+8+FQ(+4)[1
0FO10F"G+Q1'
+FQ()+4U1
FQ1"L0'
,Q1:M(Q1+4(]1]0))
`A`

s[mxm&:kx+
x)D0w8lFRP``pi\xYJEU-R:^E6Pt^rmW}[T#.*:BDNNIU5& CM Replace Macro& Maze Draw& Setup MAZLIB Library

Maze Run^R Maze Add Teleport^R Maze Autoargument^R Maze Down^R Maze Exit^R Maze Goto Beginning^R Maze Goto End^R Maze Info^R Maze Left^R Maze New Window^R Maze Next Screen^R Maze Prefix Control^R Maze Prefix Control-Meta^R Maze Prefix Meta^R Maze Previous Screen^R Maze Right^R Maze Up~DIRECTORY~~DOC~ & CM Replace Macro~DOC~ & Maze Draw ~DOC~ & Setup MAZLIB Library~DOC~ Maze Run~DOC~ ^R Maze Add Teleport~DOC~ ^R Maze Autoargument~DOC~ ^R Maze Down~DOC~ ^R Maze Exit ~DOC~ ^R Maze Goto Beginning~DOC~ ^R Maze Goto End~DOC~ ^R Maze Info~DOC~ ^R Maze Left~DOC~ ^R Maze New Window~DOC~ ^R Maze Next Screen ~DOC~ ^R Maze Prefix Control%~DOC~ ^R Maze Prefix Control-Meta~DOC~ ^R Maze Prefix Meta!~DOC~ ^R Maze Previous Screen~DOC~ ^R Maze Right~DOC~ ^R Maze Up~DOC~ ~Filename~~Filename~

~INVERT~$m.m^R Maze Add Teleportu:.X(T)
1f[FNAMSYNTAX
:I*emacs;MAZE MAZEf[DFILE
ET
5f[%TOP
50f[%CENTER
:I*CfsECHODISPLAY
[0[1[2[3[4[5[6[7[8[9[Z
[U[D[I-1[M[G0[S:I*|-[[==
ff"Ehk'"#bjS.-1(\uMc\uS),zK'
[..O
Q..O[B
fsBCREATE
Q..O[A
fnQBU..OQAFSBKILL
m.m^R Maze Info[?
m.m^R Maze Exit[...Z
m.m& CM Replace Macrou9
m.m^R Autoargument,(m.m^R Maze Autoargument)m9
m.m^R Next Screen,(m.m^R Maze Next Screen)m9
m.m^R Previous Screen,(m.m^R Maze Previous Screen)m9
m.m^R Goto End,(m.m^R Maze Goto End)m9
m.m^R Goto Beginning,(m.m^R Maze Goto Beginning)m9
m.m^R Prefix Meta,(m.m^R Maze Prefix Meta)m9
m.m^R Prefix Control,(m.m^R Maze Prefix Control)m9
m.m^R Prefix Control-Meta,(m.m^R Maze Prefix Control-Meta)m9
2fs^RINIT,(m.m^R Maze Left)m9
6fs^RINIT,(m.m^R Maze Right)m9
m.m^R Up Real Line,(m.m^R Maze Up)m9
m.m^R Down Real Line,(m.m^R Maze Down)m9
m.m^R New Window,(m.m^R Maze New Window)m9
er@Ybj\f"E1'uGc\[N
:S"L.,zFXZ'"#:I*W0uZ'bj
@:II\[0q0f:.<>^v:f"L:GCu0'
-1f[^rreplace0F[^RNORMAL
1A-q0"N0@Vm0'"#c'\
@:IU\wfsSHPOS
-1l1:<0,QT:FM>\
@:ID\wfsSHPOS
1l1:<0,QT:FM>\
ff"NQBu..O'
js*r.u0
ff"E
QBu..O
er@Y
:S"L.,zK'
j<@f
j
.-z;d32I>'
:I*0[
:I*0f[^RNORMAL
1f[^RSUPPRESS
QAu..O
Q0u1Q0jm(m.m& Maze Draw)
LW
QAu..OQ0j
2Af :>["L7fsIMAGEOUTQBu..O0'
.u12C:m(m.m& Maze Draw)LW
QAu..OQ0j
0Af :<["L7fsIMAGEOUTQBu..O0'
.U12R:m(m.m& Maze Draw)RW
QAu..OQ0jmU
1Af .^="L7fsIMAGEOUTQBu..OQ0j0'
mUQ0u1:m(m.m& Maze Draw)RW
QAu..OQ0jmD
1Af .v="L7fsIMAGEOUTQBu..OQ0j0'
mDQ0u1:m(m.m& Maze Draw)!Start!.u0mU0Au21Au32Au4
Q0j0Au52Au6mD0Au7
1Au82Au9Q0j1A[T
Q1j1A-64[X
QBu..O
Q1jQX"N32mI'"#64mI'
Q0j1A-64"E1uT'42mImUw2R
Q2mIwQ3mIwQ4mIQ0jRwQ5mIwCwQ6mI
mDw3RwQ7mIwQ8mIwQ9mIQ0j
QT-64"GQAu..O<:s;:sT;
1A-42"N0;'
cq0u1w\u0q0jOstart>
QBu..O'
QM+1uM
QT-64"E
QS+1uSQG-QS:"G
-1m(m.m^R Maze Info)
0fsECHOACTIVE
fs^REXIT'
m(m.m^R Maze Info)'
QT-64f"L+16:f"L,Q0mZ"NOstart'''
0+-1u..9
<%..9,:FU..9Q..9:;
[..9>.W
.(zjQM-1:\uMQS:\uSIMS)j
fs^REXITW
:m(m.m^R Prefix Meta) W
:m(m.m^R Prefix Control)%W
:m(m.m^R Prefix Control-Meta)yW
"L:I*CTDfsECHODISPLAY'
QM:\u7QS:\u8QG:\u9
QG-QS"G@FTYou Have a Score of 8/9'
"#@FTYou Win'
@FT in 7 Moves
QN"NQM"N
QN*QS/QGu7
QM-Q7"G
2*QM-Q7*Q7*100/QM/QM:\u8'
"#:I8100'
@FT, for a 8% Rating''
@FT.

0fsECHOACTIVEWf:@m(m.m^R Next Screen)"Wf:@m(m.m^R Previous Screen)Wf:@m(m.m^R Goto End)!Wf:@m(m.m^R Goto Beginning)Wf:@m(m.m^R Autoargument)e1,0fChar: [0.[1q1:\[2
j:S"LrWb,.fsBOUNDA'
j:S(zj)"E1I'
I0*2
0,fsZfsBOUNDAWq1jWf:@m(m.m^R New Window)
MAZLIB$Macro package for running mazes !S Put add teleport on C-X T. sC Enter ^R on maze text and let user play in the maze.
The buffer you are using will be clobbered
Special symbols used: "*" - your current location.
                      "@" - location of previously found goal.
                      "=" - horizontal door.
                      "[" - vertical door.
The commands ^R Up Real Line, ^R Down Real Line, ^R Forward Character, and ^R Backward Character
move Up (Down,Right,Left) in the maze.
^R Goto Beginning, ^R Goto End, ^R Next Screen, and ^R Previous Screen are available for moving arround in the map.
? tells you how you are doing:
"You Have a Score of <found>/<total> in <moves> Moves, for a xx% rateing."
C-M-Z (Which must be typed <esc> ^Z) will exit with your map in the
buffer in a form which can be saved for continuing (which is done by
loading the map and giving Maze Run a numeric argument.^R Move to the right ^R Move to the left ^R Move Up ^R Move Down 4S Draw the part of the maze that is now visible 1S Replaces macro definitions on ^R characters.
Takes two arguments. The first is the macro to be replaced and
the second is the replacement. It pushes the old definitions.^R Exit the Maze ^R level ^R ^R ^R '^R Says how your doing in the maze.b^R Move down to display next screenful of text.
With argument, moves window down <arg> lines.^^R Move up to display previous screenful of text.
With arg, move window back <arg> lines.^R ^R ^R /^R Add a new teleport destination to table.^R |& Setup MAZLIB Library
Maze Run
^R Maze Right
^R Maze Left
^R Maze Up
^R Maze Down
& Maze Draw
& CM Replace Macro
^R Maze Exit
^R Maze Prefix Meta
^R Maze Prefix Control
^R Maze Prefix Control-Meta
^R Maze Info
^R Maze Next Screen
^R Maze Previous Screen
^R Maze Goto End
^R Maze Goto Beginning
^R Maze Autoargument
^R Maze Add Teleport
^R Maze New Window
T+8+fq(+4)[20[3
<%3,-q2f2u3q3&1@;q3"l0'>
f[BBindq3-1*5,q3*5g2q:..o(0)+q2